home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 January: Mac OS SDK / Dev.CD Jan 98 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / AIncludes / Icons.a < prev    next >
Encoding:
Text File  |  1997-08-12  |  19.7 KB  |  713 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Icons.a
  3. ;
  4. ;    Contains:    Icon Utilities Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 8
  7. ;                Release:    Universal Interfaces 3.0.1
  8. ;
  9. ;    Copyright:    © 1990-1997 by Apple Computer, Inc. All rights reserved
  10. ;
  11. ;    Bugs?:        Please include the the file and version information (from above) with
  12. ;                the problem description.  Developers belonging to one of the Apple
  13. ;                developer programs can submit bug reports to:
  14. ;
  15. ;                    devsupport@apple.com
  16. ;
  17. ;
  18.     IF &TYPE('__ICONS__') = 'UNDEFINED' THEN
  19. __ICONS__ SET 1
  20.  
  21.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  22.     include 'Types.a'
  23.     ENDIF
  24.     IF &TYPE('__QUICKDRAW__') = 'UNDEFINED' THEN
  25.     include 'Quickdraw.a'
  26.     ENDIF
  27.  
  28.  
  29.                                                             ; The following are icons for which there are both icon suites and SICNs. 
  30. kGenericDocumentIconResource    EQU        -4000
  31. kGenericStationeryIconResource    EQU        -3985
  32. kGenericEditionFileIconResource    EQU        -3989
  33. kGenericApplicationIconResource    EQU        -3996
  34. kGenericDeskAccessoryIconResource EQU    -3991
  35. kGenericFolderIconResource        EQU        -3999
  36. kPrivateFolderIconResource        EQU        -3994
  37. kFloppyIconResource                EQU        -3998
  38. kTrashIconResource                EQU        -3993
  39. kGenericRAMDiskIconResource        EQU        -3988
  40. kGenericCDROMIconResource        EQU        -3987                ; The following are icons for which there are SICNs only. 
  41. kDesktopIconResource            EQU        -3992
  42. kOpenFolderIconResource            EQU        -3997
  43. kGenericHardDiskIconResource    EQU        -3995
  44. kGenericFileServerIconResource    EQU        -3972
  45. kGenericSuitcaseIconResource    EQU        -3970
  46. kGenericMoverObjectIconResource    EQU        -3969                ; The following are icons for which there are icon suites only. 
  47. kGenericPreferencesIconResource    EQU        -3971
  48. kGenericQueryDocumentIconResource EQU    -16506
  49. kGenericExtensionIconResource    EQU        -16415
  50. kSystemFolderIconResource        EQU        -3983
  51. kAppleMenuFolderIconResource    EQU        -3982
  52.  
  53.                                                             ; Obsolete. Use named constants defined above. 
  54. genericDocumentIconResource        EQU        -4000
  55. genericStationeryIconResource    EQU        -3985
  56. genericEditionFileIconResource    EQU        -3989
  57. genericApplicationIconResource    EQU        -3996
  58. genericDeskAccessoryIconResource EQU    -3991
  59. genericFolderIconResource        EQU        -3999
  60. privateFolderIconResource        EQU        -3994
  61. floppyIconResource                EQU        -3998
  62. trashIconResource                EQU        -3994
  63. genericRAMDiskIconResource        EQU        -3988
  64. genericCDROMIconResource        EQU        -3987
  65. desktopIconResource                EQU        -3992
  66. openFolderIconResource            EQU        -3997
  67. genericHardDiskIconResource        EQU        -3995
  68. genericFileServerIconResource    EQU        -3972
  69. genericSuitcaseIconResource        EQU        -3970
  70. genericMoverObjectIconResource    EQU        -3969
  71. genericPreferencesIconResource    EQU        -3971
  72. genericQueryDocumentIconResource EQU    -16506
  73. genericExtensionIconResource    EQU        -16415
  74. systemFolderIconResource        EQU        -3983
  75. appleMenuFolderIconResource        EQU        -3982
  76.  
  77. kStartupFolderIconResource        EQU        -3981
  78. kOwnedFolderIconResource        EQU        -3980
  79. kDropFolderIconResource            EQU        -3979
  80. kSharedFolderIconResource        EQU        -3978
  81. kMountedFolderIconResource        EQU        -3977
  82. kControlPanelFolderIconResource    EQU        -3976
  83. kPrintMonitorFolderIconResource    EQU        -3975
  84. kPreferencesFolderIconResource    EQU        -3974
  85. kExtensionsFolderIconResource    EQU        -3973
  86. kFontsFolderIconResource        EQU        -3968
  87. kFullTrashIconResource            EQU        -3984
  88.  
  89.                                                             ; Obsolete. Use named constants defined above. 
  90. startupFolderIconResource        EQU        -3981
  91. ownedFolderIconResource            EQU        -3980
  92. dropFolderIconResource            EQU        -3979
  93. sharedFolderIconResource        EQU        -3978
  94. mountedFolderIconResource        EQU        -3977
  95. controlPanelFolderIconResource    EQU        -3976
  96. printMonitorFolderIconResource    EQU        -3975
  97. preferencesFolderIconResource    EQU        -3974
  98. extensionsFolderIconResource    EQU        -3973
  99. fontsFolderIconResource            EQU        -3968
  100. fullTrashIconResource            EQU        -3984
  101.  
  102. kLarge1BitMask                    EQU        'ICN#'
  103. kLarge4BitData                    EQU        'icl4'
  104. kLarge8BitData                    EQU        'icl8'
  105. kSmall1BitMask                    EQU        'ics#'
  106. kSmall4BitData                    EQU        'ics4'
  107. kSmall8BitData                    EQU        'ics8'
  108. kMini1BitMask                    EQU        'icm#'
  109. kMini4BitData                    EQU        'icm4'
  110. kMini8BitData                    EQU        'icm8'
  111.  
  112.                                                             ; Obsolete. Use names defined above. 
  113. large1BitMask                    EQU        'ICN#'
  114. large4BitData                    EQU        'icl4'
  115. large8BitData                    EQU        'icl8'
  116. small1BitMask                    EQU        'ics#'
  117. small4BitData                    EQU        'ics4'
  118. small8BitData                    EQU        'ics8'
  119. mini1BitMask                    EQU        'icm#'
  120. mini4BitData                    EQU        'icm4'
  121. mini8BitData                    EQU        'icm8'
  122. ;   alignment type values 
  123.  
  124. kAlignNone                        EQU        $00
  125. kAlignVerticalCenter            EQU        $01
  126. kAlignTop                        EQU        $02
  127. kAlignBottom                    EQU        $03
  128. kAlignHorizontalCenter            EQU        $04
  129. kAlignAbsoluteCenter            EQU        $05
  130. kAlignCenterTop                    EQU        $06
  131. kAlignCenterBottom                EQU        $07
  132. kAlignLeft                        EQU        $08
  133. kAlignCenterLeft                EQU        $09
  134. kAlignTopLeft                    EQU        $0A
  135. kAlignBottomLeft                EQU        $0B
  136. kAlignRight                        EQU        $0C
  137. kAlignCenterRight                EQU        $0D
  138. kAlignTopRight                    EQU        $0E
  139. kAlignBottomRight                EQU        $0F
  140.  
  141.                                                             ; Obsolete. Use names defined above. 
  142. atNone                            EQU        $00
  143. atVerticalCenter                EQU        $01
  144. atTop                            EQU        $02
  145. atBottom                        EQU        $03
  146. atHorizontalCenter                EQU        $04
  147. atAbsoluteCenter                EQU        $05
  148. atCenterTop                        EQU        $06
  149. atCenterBottom                    EQU        $07
  150. atLeft                            EQU        $08
  151. atCenterLeft                    EQU        $09
  152. atTopLeft                        EQU        $0A
  153. atBottomLeft                    EQU        $0B
  154. atRight                            EQU        $0C
  155. atCenterRight                    EQU        $0D
  156. atTopRight                        EQU        $0E
  157. atBottomRight                    EQU        $0F
  158. ; typedef SInt16                         IconAlignmentType
  159.  
  160. ;   transform type values  
  161.  
  162. kTransformNone                    EQU        $00
  163. kTransformDisabled                EQU        $01
  164. kTransformOffline                EQU        $02
  165. kTransformOpen                    EQU        $03
  166. kTransformLabel1                EQU        $0100
  167. kTransformLabel2                EQU        $0200
  168. kTransformLabel3                EQU        $0300
  169. kTransformLabel4                EQU        $0400
  170. kTransformLabel5                EQU        $0500
  171. kTransformLabel6                EQU        $0600
  172. kTransformLabel7                EQU        $0700
  173. kTransformSelected                EQU        $4000
  174. kTransformSelectedDisabled        EQU        $4001
  175. kTransformSelectedOffline        EQU        $4002
  176. kTransformSelectedOpen            EQU        $4003
  177.  
  178.                                                             ; Obsolete. Use names defined above. 
  179. ttNone                            EQU        $00
  180. ttDisabled                        EQU        $01
  181. ttOffline                        EQU        $02
  182. ttOpen                            EQU        $03
  183. ttLabel1                        EQU        $0100
  184. ttLabel2                        EQU        $0200
  185. ttLabel3                        EQU        $0300
  186. ttLabel4                        EQU        $0400
  187. ttLabel5                        EQU        $0500
  188. ttLabel6                        EQU        $0600
  189. ttLabel7                        EQU        $0700
  190. ttSelected                        EQU        $4000
  191. ttSelectedDisabled                EQU        $4001
  192. ttSelectedOffline                EQU        $4002
  193. ttSelectedOpen                    EQU        $4003
  194. ; typedef SInt16                         IconTransformType
  195.  
  196. ;   Selector mask values  
  197.  
  198. kSelectorLarge1Bit                EQU        $00000001
  199. kSelectorLarge4Bit                EQU        $00000002
  200. kSelectorLarge8Bit                EQU        $00000004
  201. kSelectorSmall1Bit                EQU        $00000100
  202. kSelectorSmall4Bit                EQU        $00000200
  203. kSelectorSmall8Bit                EQU        $00000400
  204. kSelectorMini1Bit                EQU        $00010000
  205. kSelectorMini4Bit                EQU        $00020000
  206. kSelectorMini8Bit                EQU        $00040000
  207. kSelectorAllLargeData            EQU        $000000FF
  208. kSelectorAllSmallData            EQU        $0000FF00
  209. kSelectorAllMiniData            EQU        $00FF0000
  210. kSelectorAll1BitData            EQU        $00010101
  211. kSelectorAll4BitData            EQU        $00020202
  212. kSelectorAll8BitData            EQU        $00040404
  213. kSelectorAllAvailableData        EQU        $FFFFFFFF
  214.  
  215.                                                             ; Obsolete. Use names defined above. 
  216. svLarge1Bit                        EQU        $00000001
  217. svLarge4Bit                        EQU        $00000002
  218. svLarge8Bit                        EQU        $00000004
  219. svSmall1Bit                        EQU        $00000100
  220. svSmall4Bit                        EQU        $00000200
  221. svSmall8Bit                        EQU        $00000400
  222. svMini1Bit                        EQU        $00010000
  223. svMini4Bit                        EQU        $00020000
  224. svMini8Bit                        EQU        $00040000
  225. svAllLargeData                    EQU        $000000FF
  226. svAllSmallData                    EQU        $0000FF00
  227. svAllMiniData                    EQU        $00FF0000
  228. svAll1BitData                    EQU        $00010101
  229. svAll4BitData                    EQU        $00020202
  230. svAll8BitData                    EQU        $00040404
  231. svAllAvailableData                EQU        $FFFFFFFF
  232. ; typedef UInt32                         IconSelectorValue
  233.  
  234. ; typedef IconActionProcPtr             IconAction
  235.  
  236. ; typedef IconGetterProcPtr             IconGetter
  237.  
  238.     IF ¬ OLDROUTINELOCATIONS THEN
  239. CIcon                    RECORD 0
  240. iconPMap                 ds        PixMap            ; offset: $0 (0)        ; the icon's pixMap
  241. iconMask                 ds        BitMap            ; offset: $32 (50)        ; the icon's mask
  242. iconBMap                 ds        BitMap            ; offset: $40 (64)        ; the icon's bitMap
  243. iconData                 ds.l    1                ; offset: $4E (78)        ; the icon's data
  244. iconMaskData             ds.w    1                ; offset: $52 (82) <-- really an array of length one ; icon's mask and BitMap data
  245. sizeof                     EQU *                    ; size:   $54 (84)
  246.                         ENDR
  247. ; typedef struct CIcon *                CIconPtr
  248.  
  249. ; typedef CIconPtr *                    CIconHandle
  250.  
  251. ;
  252. ; pascal CIconHandle GetCIcon(SInt16 iconID)
  253. ;
  254.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  255.         _GetCIcon:    OPWORD    $AA1E
  256.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  257.         IMPORT_CFM_FUNCTION GetCIcon
  258.     ENDIF
  259.  
  260. ;
  261. ; pascal void PlotCIcon(const Rect *theRect, CIconHandle theIcon)
  262. ;
  263.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  264.         _PlotCIcon:    OPWORD    $AA1F
  265.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  266.         IMPORT_CFM_FUNCTION PlotCIcon
  267.     ENDIF
  268.  
  269. ;
  270. ; pascal void DisposeCIcon(CIconHandle theIcon)
  271. ;
  272.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  273.         _DisposeCIcon:    OPWORD    $AA25
  274.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  275.         IMPORT_CFM_FUNCTION DisposeCIcon
  276.     ENDIF
  277.  
  278.     ENDIF
  279. ;
  280. ; pascal Handle GetIcon(SInt16 iconID)
  281. ;
  282.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  283.         _GetIcon:    OPWORD    $A9BB
  284.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  285.         IMPORT_CFM_FUNCTION GetIcon
  286.     ENDIF
  287.  
  288. ;
  289. ; pascal void PlotIcon(const Rect *theRect, Handle theIcon)
  290. ;
  291.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  292.         _PlotIcon:    OPWORD    $A94B
  293.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  294.         IMPORT_CFM_FUNCTION PlotIcon
  295.     ENDIF
  296.  
  297.  
  298.  
  299. ; 
  300. ;    Note:    IconSuiteRef and IconCacheRef should be an abstract types, 
  301. ;            but too much source code already relies on them being of type Handle.
  302. ;
  303.  
  304. ; typedef Handle                         IconSuiteRef
  305.  
  306. ; typedef Handle                         IconCacheRef
  307.  
  308.  
  309. ;
  310. ; pascal OSErr PlotIconID(const Rect *theRect, IconAlignmentType align, IconTransformType transform, SInt16 theResID)
  311. ;
  312.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  313.         Macro
  314.         _PlotIconID
  315.             move.w              #$0500,D0
  316.             dc.w                $ABC9
  317.         EndM
  318.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  319.         IMPORT_CFM_FUNCTION PlotIconID
  320.     ENDIF
  321.  
  322. ;
  323. ; pascal OSErr NewIconSuite(IconSuiteRef *theIconSuite)
  324. ;
  325.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  326.         Macro
  327.         _NewIconSuite
  328.             move.w              #$0207,D0
  329.             dc.w                $ABC9
  330.         EndM
  331.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  332.         IMPORT_CFM_FUNCTION NewIconSuite
  333.     ENDIF
  334.  
  335. ;
  336. ; pascal OSErr AddIconToSuite(Handle theIconData, IconSuiteRef theSuite, ResType theType)
  337. ;
  338.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  339.         Macro
  340.         _AddIconToSuite
  341.             move.w              #$0608,D0
  342.             dc.w                $ABC9
  343.         EndM
  344.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  345.         IMPORT_CFM_FUNCTION AddIconToSuite
  346.     ENDIF
  347.  
  348. ;
  349. ; pascal OSErr GetIconFromSuite(Handle *theIconData, IconSuiteRef theSuite, ResType theType)
  350. ;
  351.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  352.         Macro
  353.         _GetIconFromSuite
  354.             move.w              #$0609,D0
  355.             dc.w                $ABC9
  356.         EndM
  357.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  358.         IMPORT_CFM_FUNCTION GetIconFromSuite
  359.     ENDIF
  360.  
  361. ;
  362. ; pascal OSErr ForEachIconDo(IconSuiteRef theSuite, IconSelectorValue selector, IconActionUPP action, void *yourDataPtr)
  363. ;
  364.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  365.         Macro
  366.         _ForEachIconDo
  367.             move.w              #$080A,D0
  368.             dc.w                $ABC9
  369.         EndM
  370.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  371.         IMPORT_CFM_FUNCTION ForEachIconDo
  372.     ENDIF
  373.  
  374. ;
  375. ; pascal OSErr GetIconSuite(IconSuiteRef *theIconSuite, SInt16 theResID, IconSelectorValue selector)
  376. ;
  377.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  378.         Macro
  379.         _GetIconSuite
  380.             move.w              #$0501,D0
  381.             dc.w                $ABC9
  382.         EndM
  383.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  384.         IMPORT_CFM_FUNCTION GetIconSuite
  385.     ENDIF
  386.  
  387. ;
  388. ; pascal OSErr DisposeIconSuite(IconSuiteRef theIconSuite, Boolean disposeData)
  389. ;
  390.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  391.         Macro
  392.         _DisposeIconSuite
  393.             move.w              #$0302,D0
  394.             dc.w                $ABC9
  395.         EndM
  396.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  397.         IMPORT_CFM_FUNCTION DisposeIconSuite
  398.     ENDIF
  399.  
  400. ;
  401. ; pascal OSErr PlotIconSuite(const Rect *theRect, IconAlignmentType align, IconTransformType transform, IconSuiteRef theIconSuite)
  402. ;
  403.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  404.         Macro
  405.         _PlotIconSuite
  406.             move.w              #$0603,D0
  407.             dc.w                $ABC9
  408.         EndM
  409.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  410.         IMPORT_CFM_FUNCTION PlotIconSuite
  411.     ENDIF
  412.  
  413. ;
  414. ; pascal OSErr MakeIconCache(IconCacheRef *theCache, IconGetterUPP makeIcon, void *yourDataPtr)
  415. ;
  416.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  417.         Macro
  418.         _MakeIconCache
  419.             move.w              #$0604,D0
  420.             dc.w                $ABC9
  421.         EndM
  422.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  423.         IMPORT_CFM_FUNCTION MakeIconCache
  424.     ENDIF
  425.  
  426. ;
  427. ; pascal OSErr LoadIconCache(const Rect *theRect, IconAlignmentType align, IconTransformType transform, IconCacheRef theIconCache)
  428. ;
  429.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  430.         Macro
  431.         _LoadIconCache
  432.             move.w              #$0606,D0
  433.             dc.w                $ABC9
  434.         EndM
  435.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  436.         IMPORT_CFM_FUNCTION LoadIconCache
  437.     ENDIF
  438.  
  439. ;
  440. ; pascal OSErr PlotIconMethod(const Rect *theRect, IconAlignmentType align, IconTransformType transform, IconGetterUPP theMethod, void *yourDataPtr)
  441. ;
  442.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  443.         Macro
  444.         _PlotIconMethod
  445.             move.w              #$0805,D0
  446.             dc.w                $ABC9
  447.         EndM
  448.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  449.         IMPORT_CFM_FUNCTION PlotIconMethod
  450.     ENDIF
  451.  
  452. ;
  453. ; pascal OSErr GetLabel(SInt16 labelNumber, RGBColor *labelColor, Str255 labelString)
  454. ;
  455.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  456.         Macro
  457.         _GetLabel
  458.             move.w              #$050B,D0
  459.             dc.w                $ABC9
  460.         EndM
  461.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  462.         IMPORT_CFM_FUNCTION GetLabel
  463.     ENDIF
  464.  
  465. ;
  466. ; pascal Boolean PtInIconID(Point testPt, const Rect *iconRect, IconAlignmentType align, SInt16 iconID)
  467. ;
  468.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  469.         Macro
  470.         _PtInIconID
  471.             move.w              #$060D,D0
  472.             dc.w                $ABC9
  473.         EndM
  474.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  475.         IMPORT_CFM_FUNCTION PtInIconID
  476.     ENDIF
  477.  
  478. ;
  479. ; pascal Boolean PtInIconSuite(Point testPt, const Rect *iconRect, IconAlignmentType align, IconSuiteRef theIconSuite)
  480. ;
  481.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  482.         Macro
  483.         _PtInIconSuite
  484.             move.w              #$070E,D0
  485.             dc.w                $ABC9
  486.         EndM
  487.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  488.         IMPORT_CFM_FUNCTION PtInIconSuite
  489.     ENDIF
  490.  
  491. ;
  492. ; pascal Boolean PtInIconMethod(Point testPt, const Rect *iconRect, IconAlignmentType align, IconGetterUPP theMethod, void *yourDataPtr)
  493. ;
  494.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  495.         Macro
  496.         _PtInIconMethod
  497.             move.w              #$090F,D0
  498.             dc.w                $ABC9
  499.         EndM
  500.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  501.         IMPORT_CFM_FUNCTION PtInIconMethod
  502.     ENDIF
  503.  
  504. ;
  505. ; pascal Boolean RectInIconID(const Rect *testRect, const Rect *iconRect, IconAlignmentType align, SInt16 iconID)
  506. ;
  507.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  508.         Macro
  509.         _RectInIconID
  510.             move.w              #$0610,D0
  511.             dc.w                $ABC9
  512.         EndM
  513.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  514.         IMPORT_CFM_FUNCTION RectInIconID
  515.     ENDIF
  516.  
  517. ;
  518. ; pascal Boolean RectInIconSuite(const Rect *testRect, const Rect *iconRect, IconAlignmentType align, IconSuiteRef theIconSuite)
  519. ;
  520.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  521.         Macro
  522.         _RectInIconSuite
  523.             move.w              #$0711,D0
  524.             dc.w                $ABC9
  525.         EndM
  526.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  527.         IMPORT_CFM_FUNCTION RectInIconSuite
  528.     ENDIF
  529.  
  530. ;
  531. ; pascal Boolean RectInIconMethod(const Rect *testRect, const Rect *iconRect, IconAlignmentType align, IconGetterUPP theMethod, void *yourDataPtr)
  532. ;
  533.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  534.         Macro
  535.         _RectInIconMethod
  536.             move.w              #$0912,D0
  537.             dc.w                $ABC9
  538.         EndM
  539.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  540.         IMPORT_CFM_FUNCTION RectInIconMethod
  541.     ENDIF
  542.  
  543. ;
  544. ; pascal OSErr IconIDToRgn(RgnHandle theRgn, const Rect *iconRect, IconAlignmentType align, SInt16 iconID)
  545. ;
  546.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  547.         Macro
  548.         _IconIDToRgn
  549.             move.w              #$0613,D0
  550.             dc.w                $ABC9
  551.         EndM
  552.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  553.         IMPORT_CFM_FUNCTION IconIDToRgn
  554.     ENDIF
  555.  
  556. ;
  557. ; pascal OSErr IconSuiteToRgn(RgnHandle theRgn, const Rect *iconRect, IconAlignmentType align, IconSuiteRef theIconSuite)
  558. ;
  559.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  560.         Macro
  561.         _IconSuiteToRgn
  562.             move.w              #$0714,D0
  563.             dc.w                $ABC9
  564.         EndM
  565.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  566.         IMPORT_CFM_FUNCTION IconSuiteToRgn
  567.     ENDIF
  568.  
  569. ;
  570. ; pascal OSErr IconMethodToRgn(RgnHandle theRgn, const Rect *iconRect, IconAlignmentType align, IconGetterUPP theMethod, void *yourDataPtr)
  571. ;
  572.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  573.         Macro
  574.         _IconMethodToRgn
  575.             move.w              #$0915,D0
  576.             dc.w                $ABC9
  577.         EndM
  578.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  579.         IMPORT_CFM_FUNCTION IconMethodToRgn
  580.     ENDIF
  581.  
  582. ;
  583. ; pascal OSErr SetSuiteLabel(IconSuiteRef theSuite, SInt16 theLabel)
  584. ;
  585.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  586.         Macro
  587.         _SetSuiteLabel
  588.             move.w              #$0316,D0
  589.             dc.w                $ABC9
  590.         EndM
  591.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  592.         IMPORT_CFM_FUNCTION SetSuiteLabel
  593.     ENDIF
  594.  
  595. ;
  596. ; pascal SInt16 GetSuiteLabel(IconSuiteRef theSuite)
  597. ;
  598.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  599.         Macro
  600.         _GetSuiteLabel
  601.             move.w              #$0217,D0
  602.             dc.w                $ABC9
  603.         EndM
  604.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  605.         IMPORT_CFM_FUNCTION GetSuiteLabel
  606.     ENDIF
  607.  
  608. ;
  609. ; pascal OSErr GetIconCacheData(IconCacheRef theCache, void **theData)
  610. ;
  611.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  612.         Macro
  613.         _GetIconCacheData
  614.             move.w              #$0419,D0
  615.             dc.w                $ABC9
  616.         EndM
  617.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  618.         IMPORT_CFM_FUNCTION GetIconCacheData
  619.     ENDIF
  620.  
  621. ;
  622. ; pascal OSErr SetIconCacheData(IconCacheRef theCache, void *theData)
  623. ;
  624.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  625.         Macro
  626.         _SetIconCacheData
  627.             move.w              #$041A,D0
  628.             dc.w                $ABC9
  629.         EndM
  630.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  631.         IMPORT_CFM_FUNCTION SetIconCacheData
  632.     ENDIF
  633.  
  634. ;
  635. ; pascal OSErr GetIconCacheProc(IconCacheRef theCache, IconGetterUPP *theProc)
  636. ;
  637.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  638.         Macro
  639.         _GetIconCacheProc
  640.             move.w              #$041B,D0
  641.             dc.w                $ABC9
  642.         EndM
  643.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  644.         IMPORT_CFM_FUNCTION GetIconCacheProc
  645.     ENDIF
  646.  
  647. ;
  648. ; pascal OSErr SetIconCacheProc(IconCacheRef theCache, IconGetterUPP theProc)
  649. ;
  650.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  651.         Macro
  652.         _SetIconCacheProc
  653.             move.w              #$041C,D0
  654.             dc.w                $ABC9
  655.         EndM
  656.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  657.         IMPORT_CFM_FUNCTION SetIconCacheProc
  658.     ENDIF
  659.  
  660. ;
  661. ; pascal OSErr PlotIconHandle(const Rect *theRect, IconAlignmentType align, IconTransformType transform, Handle theIcon)
  662. ;
  663.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  664.         Macro
  665.         _PlotIconHandle
  666.             move.w              #$061D,D0
  667.             dc.w                $ABC9
  668.         EndM
  669.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  670.         IMPORT_CFM_FUNCTION PlotIconHandle
  671.     ENDIF
  672.  
  673. ;
  674. ; pascal OSErr PlotSICNHandle(const Rect *theRect, IconAlignmentType align, IconTransformType transform, Handle theSICN)
  675. ;
  676.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  677.         Macro
  678.         _PlotSICNHandle
  679.             move.w              #$061E,D0
  680.             dc.w                $ABC9
  681.         EndM
  682.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  683.         IMPORT_CFM_FUNCTION PlotSICNHandle
  684.     ENDIF
  685.  
  686. ;
  687. ; pascal OSErr PlotCIconHandle(const Rect *theRect, IconAlignmentType align, IconTransformType transform, CIconHandle theCIcon)
  688. ;
  689.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  690.         Macro
  691.         _PlotCIconHandle
  692.             move.w              #$061F,D0
  693.             dc.w                $ABC9
  694.         EndM
  695.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  696.         IMPORT_CFM_FUNCTION PlotCIconHandle
  697.     ENDIF
  698.  
  699.  
  700.  
  701.  
  702.  
  703.  
  704.  
  705.  
  706.  
  707.  
  708.  
  709.  
  710.  
  711.     ENDIF ; __ICONS__ 
  712.  
  713.